/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64-128Toolkit / COMALTUTOR2.SDA / LESSON NINE

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 4d 10 bf 11 b5 13 00 0a | 1b 00 20 44 45 4c 45 54 |M.......|.. DELET|
|00000010| 45 20 22 30 3a 4c 45 53 | 53 4f 4e 20 4e 49 4e 45 |E "0:LES|SON NINE|
|00000020| 22 00 14 16 00 20 53 48 | 49 47 4c 45 59 20 54 55 |".... SH|IGLEY TU|
|00000030| 54 4f 52 49 41 4c 53 00 | 1e 1b 00 20 53 41 56 45 |TORIALS.|... SAVE|
|00000040| 20 20 20 22 30 3a 4c 45 | 53 53 4f 4e 20 4e 49 4e |   "0:LE|SSON NIN|
|00000050| 45 22 00 28 06 7f 11 81 | 00 32 06 7f 12 81 00 3c |E".(....|.2.....<|
|00000060| 06 7f 15 81 00 46 06 7f | 16 81 00 50 06 7f 17 81 |.....F..|...P....|
|00000070| 00 5a 06 7f 18 81 00 64 | 06 7f 19 81 00 6e 06 7f |.Z.....d|.....n..|
|00000080| 1f 81 00 78 06 7f 1a 81 | 00 82 04 00 00 8c 09 70 |...x....|.......p|
|00000090| 11 50 8a 00 7b 00 96 0b | 5f 02 00 8e 4b 65 60 61 |.P..{...|_...Ke`a|
|000000a0| 00 a0 0c 8c 8f 0c 00 02 | 00 0a 93 c5 00 aa 06 7f |........|........|
|000000b0| 13 81 00 b4 0a ff 46 02 | 00 00 ff 47 00 be 0a ff |......F.|...G....|
|000000c0| 1e 02 00 0c ff 1f 00 c8 | 11 5f 03 08 4c 45 53 53 |........|._..LESS|
|000000d0| 4f 4e 20 39 65 60 61 00 | d2 28 5f 03 1f 44 45 43 |ON 9e`a.|.(_..DEC|
|000000e0| 49 53 49 4f 4e 53 20 57 | 49 54 48 20 54 48 45 20 |ISIONS W|ITH THE |
|000000f0| 49 46 20 53 54 52 55 43 | 54 55 52 45 65 60 61 00 |IF STRUC|TUREe`a.|
|00000100| dc 06 7f 10 81 00 e6 05 | 7d 11 00 f0 04 00 00 fa |........|}.......|
|00000110| 09 70 13 6d 8a 00 7b 01 | 04 0b 5f 02 00 93 4b 65 |.p.m..{.|.._...Ke|
|00000120| 66 61 01 0e 05 7d 13 01 | 18 04 00 01 22 09 70 10 |fa...}..|....".p.|
|00000130| f9 8a 00 7c 01 2c 06 5f | 60 61 01 36 09 07 0d 02 |...|.,._|`a.6....|
|00000140| 02 8d 3a 01 40 0b 97 04 | 0d d8 37 98 c4 8a 01 4a |..:.@...|..7....J|
|00000150| 16 5f 03 0d 1c 50 52 45 | 53 53 20 53 48 49 46 54 |._...PRE|SS SHIFT|
|00000160| 91 65 60 61 01 54 15 5f | 03 0c 20 20 20 20 20 20 |.e`a.T._|..      |
|00000170| 20 20 20 20 20 91 65 60 | 61 01 5e 06 9b 8e 8a 01 |     .e`|a.^.....|
|00000180| 68 0a ff 1e 02 00 0c ff | 1f 01 72 12 82 05 10 00 |h.......|..r.....|
|00000190| 02 00 01 84 02 01 2c 85 | 88 f4 89 01 7c 06 7f 13 |......,.|....|...|
|000001a0| 81 01 86 0d 97 f9 02 00 | 00 4b 31 99 f4 9a 01 90 |........|.K1.....|
|000001b0| 05 7d 10 01 9a 04 00 01 | a4 09 70 1a 17 8b 00 7b |.}......|..p....{|
|000001c0| 01 ae 0c d2 03 04 4d 45 | 4e 55 d4 d3 01 b8 05 7d |......ME|NU.....}|
|000001d0| 1a 01 c2 04 00 01 cc 09 | 70 12 50 8c 00 7b 01 d6 |........|p.P..{..|
|000001e0| 2e 5f 03 25 59 4f 55 20 | 48 41 56 45 20 41 4c 52 |._.%YOU |HAVE ALR|
|000001f0| 45 41 44 59 20 53 45 45 | 4e 20 44 45 43 49 53 49 |EADY SEE|N DECISI|
|00000200| 4f 4e 2d 4d 41 4b 49 4e | 47 65 60 61 01 e0 2d 5f |ON-MAKIN|Ge`a..-_|
|00000210| 03 24 11 50 4f 57 45 52 | 20 57 49 54 48 20 54 48 |.$.POWER| WITH TH|
|00000220| 45 20 43 41 53 45 20 53 | 54 41 54 45 4d 45 4e 54 |E CASE S|TATEMENT|
|00000230| 2e 20 20 42 55 54 65 60 | 61 01 ea 31 5f 03 28 11 |.  BUTe`|a..1_.(.|
|00000240| 57 48 41 54 20 49 46 20 | 59 4f 55 20 48 41 56 45 |WHAT IF |YOU HAVE|
|00000250| 20 4f 4e 4c 59 20 54 57 | 4f 20 41 4c 54 45 52 4e | ONLY TW|O ALTERN|
|00000260| 41 54 49 56 45 53 3f 65 | 60 61 01 f4 31 5f 03 28 |ATIVES?e|`a..1_.(|
|00000270| 11 54 48 45 20 27 49 46 | 27 20 53 54 52 55 43 54 |.THE 'IF|' STRUCT|
|00000280| 55 52 45 20 50 45 52 4d | 49 54 53 20 41 20 50 52 |URE PERM|ITS A PR|
|00000290| 4f 47 52 41 4d 20 54 4f | 65 60 61 01 fe 2f 5f 03 |OGRAM TO|e`a../_.|
|000002a0| 26 11 43 48 4f 4f 53 45 | 20 42 45 54 57 45 45 4e |&.CHOOSE| BETWEEN|
|000002b0| 20 54 41 4b 49 4e 47 20 | 54 57 4f 20 41 4c 54 45 | TAKING |TWO ALTE|
|000002c0| 52 4e 41 54 49 56 45 65 | 60 61 02 08 29 5f 03 20 |RNATIVEe|`a..)_. |
|000002d0| 11 41 43 54 49 4f 4e 53 | 2e 20 20 4c 4f 4f 4b 20 |.ACTIONS|.  LOOK |
|000002e0| 41 54 20 54 48 49 53 20 | 50 52 4f 47 52 41 4d 2e |AT THIS |PROGRAM.|
|000002f0| 65 60 61 02 12 06 5f 60 | 61 02 1c 06 7f 48 81 02 |e`a..._`|a....H..|
|00000300| 26 06 7f 10 81 02 30 05 | 7d 12 02 3a 04 00 02 44 |&.....0.|}..:...D|
|00000310| 09 70 15 d0 8d 00 7b 02 | 4e 1b 5f 03 12 52 55 4e |.p....{.|N._..RUN|
|00000320| 20 54 48 45 20 50 52 4f | 47 52 41 4d 2e 2e 2e 65 | THE PRO|GRAM...e|
|00000330| 60 61 02 58 06 7f 47 81 | 02 62 0a ff 1e 02 00 0e |`a.X..G.|.b......|
|00000340| ff 1f 02 6c 23 5f 03 1a | 43 4f 4c 55 4d 42 55 53 |...l#_..|COLUMBUS|
|00000350| 20 49 53 20 41 42 4f 55 | 54 20 54 4f 20 53 41 49 | IS ABOU|T TO SAI|
|00000360| 4c 2e 65 60 61 02 76 22 | 5f 03 19 48 45 20 57 49 |L.e`a.v"|_..HE WI|
|00000370| 4c 4c 20 44 49 53 43 4f | 56 45 52 20 41 4d 45 52 |LL DISCO|VER AMER|
|00000380| 49 43 41 2e 65 60 61 02 | 80 06 5f 60 61 02 8a 0a |ICA.e`a.|.._`a...|
|00000390| ff 1e 02 00 0c ff 1f 02 | 94 22 5f 03 19 4c 49 53 |........|."_..LIS|
|000003a0| 54 20 54 48 45 20 50 52 | 4f 47 52 41 4d 20 41 47 |T THE PR|OGRAM AG|
|000003b0| 41 49 4e 2e 2e 2e 65 60 | 61 02 9e 06 7f 46 81 02 |AIN...e`|a....F..|
|000003c0| a8 06 7f 48 81 02 b2 06 | 7f 4a 81 02 bc 0a ff 1e |...H....|.J......|
|000003d0| 02 00 0c ff 1f 02 c6 30 | 5f 03 27 11 4e 4f 54 49 |.......0|_.'.NOTI|
|000003e0| 43 45 20 54 48 41 54 20 | 54 48 45 20 49 46 20 53 |CE THAT |THE IF S|
|000003f0| 54 52 55 43 54 55 52 45 | 20 54 45 53 54 53 20 54 |TRUCTURE| TESTS T|
|00000400| 48 45 65 60 61 02 d0 2f | 5f 03 26 11 54 52 55 54 |HEe`a../|_.&.TRUT|
|00000410| 48 20 4f 46 20 54 48 45 | 20 56 41 52 49 41 42 4c |H OF THE| VARIABL|
|00000420| 45 20 45 41 52 54 48 27 | 49 53 27 52 4f 55 4e 44 |E EARTH'|IS'ROUND|
|00000430| 2e 65 60 61 02 da 30 5f | 03 27 11 57 45 20 54 4f |.e`a..0_|.'.WE TO|
|00000440| 4c 44 20 54 48 45 20 43 | 4f 4d 50 55 54 45 52 20 |LD THE C|OMPUTER |
|00000450| 54 4f 20 52 45 43 4f 47 | 4e 49 5a 45 20 54 48 49 |TO RECOG|NIZE THI|
|00000460| 53 65 60 61 02 e4 1b 5f | 03 12 11 56 41 52 49 41 |Se`a..._|...VARIA|
|00000470| 42 4c 45 20 41 53 20 54 | 52 55 45 2e 65 60 61 02 |BLE AS T|RUE.e`a.|
|00000480| ee 06 7f 10 81 02 f8 05 | 7d 15 03 02 04 00 03 0c |........|}.......|
|00000490| 09 70 16 b4 8f 00 7b 03 | 16 2f 5f 03 26 4c 45 54 |.p....{.|./_.&LET|
|000004a0| 27 53 20 43 4f 4d 42 49 | 4e 45 20 53 4f 4d 45 20 |'S COMBI|NE SOME |
|000004b0| 4f 46 20 4f 55 52 20 4f | 54 48 45 52 20 53 54 41 |OF OUR O|THER STA|
|000004c0| 54 45 2d 65 60 61 03 20 | 2d 5f 03 24 11 4d 45 4e |TE-e`a. |-_.$.MEN|
|000004d0| 54 53 20 57 49 54 48 20 | 54 48 45 20 49 46 20 53 |TS WITH |THE IF S|
|000004e0| 54 52 55 43 54 55 52 45 | 20 54 4f 20 4d 41 4b 45 |TRUCTURE| TO MAKE|
|000004f0| 65 60 61 03 2a 31 5f 03 | 28 11 41 20 53 48 4f 52 |e`a.*1_.|(.A SHOR|
|00000500| 54 20 47 55 45 53 53 2d | 54 48 45 2d 4e 55 4d 42 |T GUESS-|THE-NUMB|
|00000510| 45 52 20 47 41 4d 45 2e | 20 20 57 45 20 57 49 4c |ER GAME.|  WE WIL|
|00000520| 4c 65 60 61 03 34 2b 5f | 03 22 11 48 41 56 45 20 |Le`a.4+_|.".HAVE |
|00000530| 54 48 45 20 43 4f 4d 50 | 55 54 45 52 20 53 45 4c |THE COMP|UTER SEL|
|00000540| 45 43 54 20 41 20 52 41 | 4e 44 4f 4d 65 60 61 03 |ECT A RA|NDOMe`a.|
|00000550| 3e 2f 5f 03 26 11 4e 55 | 4d 42 45 52 20 42 45 54 |>/_.&.NU|MBER BET|
|00000560| 57 45 45 4e 20 31 20 41 | 4e 44 20 32 30 20 41 4e |WEEN 1 A|ND 20 AN|
|00000570| 44 20 54 48 45 4e 20 48 | 41 56 45 65 60 61 03 48 |D THEN H|AVEe`a.H|
|00000580| 2f 5f 03 26 11 54 48 45 | 20 55 53 45 52 20 47 55 |/_.&.THE| USER GU|
|00000590| 45 53 53 20 41 20 4e 55 | 4d 42 45 52 2e 20 20 41 |ESS A NU|MBER.  A|
|000005a0| 46 54 45 52 20 48 45 20 | 4f 52 65 60 61 03 52 2e |FTER HE |ORe`a.R.|
|000005b0| 5f 03 25 11 53 48 45 20 | 47 55 45 53 53 45 53 2c |_.%.SHE |GUESSES,|
|000005c0| 20 54 48 45 20 43 4f 4d | 50 55 54 45 52 20 57 49 | THE COM|PUTER WI|
|000005d0| 4c 4c 20 52 45 50 4c 59 | 65 60 61 03 5c 2e 5f 03 |LL REPLY|e`a.\._.|
|000005e0| 25 11 41 50 50 52 4f 50 | 52 49 41 54 45 4c 59 2d |%.APPROP|RIATELY-|
|000005f0| 2d 54 4f 4f 20 48 49 47 | 48 2c 20 54 4f 4f 20 4c |-TOO HIG|H, TOO L|
|00000600| 4f 57 2c 20 4f 52 65 60 | 61 03 66 32 5f 03 29 11 |OW, ORe`|a.f2_.).|
|00000610| 50 45 52 46 45 43 54 20 | 47 55 45 53 53 2e 20 20 |PERFECT |GUESS.  |
|00000620| 57 48 59 20 4e 4f 54 20 | 48 41 56 45 20 54 48 45 |WHY NOT |HAVE THE|
|00000630| 20 50 52 4f 47 52 41 4d | 65 60 61 03 70 28 5f 03 | PROGRAM|e`a.p(_.|
|00000640| 1f 43 4f 4e 53 49 53 54 | 20 4f 46 20 4a 55 53 54 |.CONSIST| OF JUST|
|00000650| 20 54 57 4f 20 50 52 4f | 43 45 44 55 52 45 53 2e | TWO PRO|CEDURES.|
|00000660| 65 60 61 03 7a 06 7f 10 | 81 03 84 05 7d 16 03 8e |e`a.z...|....}...|
|00000670| 04 00 03 98 09 70 17 a5 | 91 00 7b 03 a2 0a ff 1e |.....p..|..{.....|
|00000680| 02 00 0e ff 1f 03 ac 13 | 5f 03 0a 47 45 54 27 52 |........|_..GET'R|
|00000690| 41 4e 44 4f 4d 65 60 61 | 03 b6 0e 5f 03 05 47 55 |ANDOMe`a|..._..GU|
|000006a0| 45 53 53 65 60 61 03 c0 | 06 5f 60 61 03 ca 06 7f |ESSe`a..|._`a....|
|000006b0| 4a 81 03 d4 0a ff 1e 02 | 00 0c ff 1f 03 de 2d 5f |J.......|......-_|
|000006c0| 03 24 54 48 45 52 45 27 | 53 20 54 48 45 20 4d 41 |.$THERE'|S THE MA|
|000006d0| 49 4e 20 50 52 4f 47 52 | 41 4d 2e 20 20 54 48 45 |IN PROGR|AM.  THE|
|000006e0| 20 46 49 52 53 54 65 60 | 61 03 e8 28 5f 03 1f 11 | FIRSTe`|a..(_...|
|000006f0| 50 52 4f 43 45 44 55 52 | 45 20 55 53 45 44 20 49 |PROCEDUR|E USED I|
|00000700| 53 20 9e 47 45 54 27 52 | 41 4e 44 4f 4d 2e 65 60 |S .GET'R|ANDOM.e`|
|00000710| 61 03 f2 06 5f 60 61 03 | fc 06 7f 4a 81 04 06 0a |a..._`a.|...J....|
|00000720| ff 1e 02 00 0e ff 1f 04 | 10 18 5f 03 0f 50 52 4f |........|.._..PRO|
|00000730| 43 20 47 45 54 27 52 41 | 4e 44 4f 4d 65 60 61 04 |C GET'RA|NDOMe`a.|
|00000740| 1a 1b 5f 03 12 20 4e 55 | 4d 42 45 52 3a 3d 52 4e |.._.. NU|MBER:=RN|
|00000750| 44 28 31 2c 32 30 29 65 | 60 61 04 24 10 5f 03 07 |D(1,20)e|`a.$._..|
|00000760| 45 4e 44 50 52 4f 43 65 | 60 61 04 2e 06 5f 60 61 |ENDPROCe|`a..._`a|
|00000770| 04 38 06 7f 4a 81 04 42 | 0a ff 1e 02 00 0c ff 1f |.8..J..B|........|
|00000780| 04 4c 2e 5f 03 25 4e 4f | 54 49 43 45 20 48 4f 57 |.L._.%NO|TICE HOW|
|00000790| 20 45 41 53 59 20 49 54 | 20 49 53 20 54 4f 20 47 | EASY IT| IS TO G|
|000007a0| 45 54 20 41 20 52 41 4e | 44 4f 4d 65 60 61 04 56 |ET A RAN|DOMe`a.V|
|000007b0| 22 5f 03 19 11 4e 55 4d | 42 45 52 20 42 45 54 57 |"_...NUM|BER BETW|
|000007c0| 45 45 4e 20 31 20 41 4e | 44 20 32 30 21 65 60 61 |EEN 1 AN|D 20!e`a|
|000007d0| 04 60 30 5f 03 27 11 52 | 4e 44 20 49 53 20 41 20 |.`0_.'.R|ND IS A |
|000007e0| 42 55 49 4c 54 2d 49 4e | 20 27 46 55 4e 43 54 49 |BUILT-IN| 'FUNCTI|
|000007f0| 4f 4e 27 20 54 48 41 54 | 20 57 49 4c 4c 65 60 61 |ON' THAT| WILLe`a|
|00000800| 04 6a 30 5f 03 27 11 46 | 49 4e 44 20 41 20 52 41 |.j0_.'.F|IND A RA|
|00000810| 4e 44 4f 4d 20 4e 55 4d | 42 45 52 20 42 45 54 57 |NDOM NUM|BER BETW|
|00000820| 45 45 4e 20 54 48 45 20 | 52 41 4e 47 45 65 60 61 |EEN THE |RANGEe`a|
|00000830| 04 74 24 5f 03 1b 11 59 | 4f 55 20 53 55 50 50 4c |.t$_...Y|OU SUPPL|
|00000840| 59 20 49 4e 20 50 41 52 | 45 4e 54 48 45 53 45 53 |Y IN PAR|ENTHESES|
|00000850| 2e 65 60 61 04 7e 06 7f | 10 81 04 88 05 7d 17 04 |.e`a.~..|.....}..|
|00000860| 92 04 00 04 9c 09 70 18 | 14 92 00 7b 04 a6 30 5f |......p.|...{..0_|
|00000870| 03 27 54 48 45 20 4e 45 | 58 54 20 50 52 4f 43 45 |.'THE NE|XT PROCE|
|00000880| 44 55 52 45 20 49 53 20 | 54 48 45 20 4f 4e 45 20 |DURE IS |THE ONE |
|00000890| 54 48 41 54 20 55 53 45 | 53 65 60 61 04 b0 1b 5f |THAT USE|Se`a..._|
|000008a0| 03 12 11 54 48 45 20 49 | 46 20 53 54 52 55 43 54 |...THE I|F STRUCT|
|000008b0| 55 52 45 2e 65 60 61 04 | ba 06 5f 60 61 04 c4 06 |URE.e`a.|.._`a...|
|000008c0| 7f 49 81 04 ce 06 7f 10 | 81 04 d8 05 7d 18 04 e2 |.I......|....}...|
|000008d0| 04 00 04 ec 09 70 19 2e | 94 00 7b 04 f6 23 5f 03 |.....p..|..{..#_.|
|000008e0| 1a 4c 49 53 54 20 54 48 | 45 20 45 4e 54 49 52 45 |.LIST TH|E ENTIRE|
|000008f0| 20 50 52 4f 47 52 41 4d | 2e 2e 2e 65 60 61 05 00 | PROGRAM|...e`a..|
|00000900| 06 7f 46 81 05 0a 0a ff | 1e 02 00 0e ff 1f 05 14 |..F.....|........|
|00000910| 13 5f 03 0a 47 45 54 27 | 52 41 4e 44 4f 4d 65 60 |._..GET'|RANDOMe`|
|00000920| 61 05 1e 0e 5f 03 05 47 | 55 45 53 53 65 60 61 05 |a..._..G|UESSe`a.|
|00000930| 28 0b 5f 03 02 2f 2f 65 | 60 61 05 32 18 5f 03 0f |(._..//e|`a.2._..|
|00000940| 50 52 4f 43 20 47 45 54 | 27 52 41 4e 44 4f 4d 65 |PROC GET|'RANDOMe|
|00000950| 60 61 05 3c 1b 5f 03 12 | 20 4e 55 4d 42 45 52 3a |`a.<._..| NUMBER:|
|00000960| 3d 52 4e 44 28 31 2c 32 | 30 29 65 60 61 05 46 10 |=RND(1,2|0)e`a.F.|
|00000970| 5f 03 07 45 4e 44 50 52 | 4f 43 65 60 61 05 50 0b |_..ENDPR|OCe`a.P.|
|00000980| 5f 03 02 2f 2f 65 60 61 | 05 5a 06 7f 49 81 05 64 |_..//e`a|.Z..I..d|
|00000990| 0a ff 1e 02 00 0c ff 1f | 05 6e 06 5f 60 61 05 78 |........|.n._`a.x|
|000009a0| 06 7f 4a 81 05 82 2c 5f | 03 23 28 2f 2f 29 20 4d |..J...,_|.#(//) M|
|000009b0| 41 4b 45 20 54 48 45 20 | 50 52 4f 43 45 44 55 52 |AKE THE |PROCEDUR|
|000009c0| 45 53 20 53 54 41 4e 44 | 20 4f 55 54 2e 65 60 61 |ES STAND| OUT.e`a|
|000009d0| 05 8c 06 7f 10 81 05 96 | 2b 5f 03 22 57 45 20 41 |........|+_."WE A|
|000009e0| 52 45 20 52 45 41 44 59 | 20 54 4f 20 52 55 4e 20 |RE READY| TO RUN |
|000009f0| 54 48 45 20 50 52 4f 47 | 52 41 4d 2e 2e 2e 65 60 |THE PROG|RAM...e`|
|00000a00| 61 05 a0 06 7f 47 81 05 | aa 0a ff 1e 02 00 0e ff |a....G..|........|
|00000a10| 1f 05 b4 0e 07 37 02 00 | 01 02 00 14 55 54 3a 05 |.....7..|....UT:.|
|00000a20| be 1d 5f 03 14 49 20 4e | 4f 57 20 48 41 56 45 20 |.._..I N|OW HAVE |
|00000a30| 41 20 4e 55 4d 42 45 52 | 2e 65 60 61 05 c8 04 95 |A NUMBER|.e`a....|
|00000a40| 05 d2 1c b5 03 11 45 4e | 54 45 52 20 59 4f 55 52 |......EN|TER YOUR|
|00000a50| 20 47 55 45 53 53 3a b7 | 07 42 b8 bb 05 dc 0c 68 | GUESS:.|.B.....h|
|00000a60| 04 42 04 37 2a 69 d1 93 | 05 e6 1e 5f 03 15 54 4f |.B.7*i..|..._..TO|
|00000a70| 4f 20 4c 4f 57 2e 20 20 | 47 55 45 53 53 20 41 47 |O LOW.  |GUESS AG|
|00000a80| 41 49 4e 65 60 61 05 f0 | 04 6f 05 fa 0c 68 04 42 |AINe`a..|.o...h.B|
|00000a90| 04 37 30 69 ff 93 06 04 | 1e 5f 03 15 54 4f 4f 20 |.70i....|._..TOO |
|00000aa0| 48 49 47 48 2e 20 47 55 | 45 53 53 20 41 47 41 49 |HIGH. GU|ESS AGAI|
|00000ab0| 4e 65 60 61 06 0e 04 6f | 06 18 0c da 04 42 04 37 |Ne`a...o|.....B.7|
|00000ac0| 2c 96 87 93 06 22 19 5f | 03 10 59 4f 55 20 47 55 |,...."._|..YOU GU|
|00000ad0| 45 53 53 45 44 20 49 54 | 21 21 65 60 61 06 2c 06 |ESSED IT|!!e`a.,.|
|00000ae0| 7f 10 81 06 36 05 7d 19 | 06 40 04 00 06 4a 09 70 |....6.}.|.@...J.p|
|00000af0| 1f 4a 96 00 7b 06 54 0b | 5f 02 00 0e 4b 65 60 61 |.J..{.T.|_...Ke`a|
|00000b00| 06 5e 0a ff 1e 02 00 05 | ff 1f 06 68 10 5f 03 07 |.^......|...h._..|
|00000b10| d3 d5 cd cd c1 d2 d9 65 | 60 61 06 72 06 5f 60 61 |.......e|`a.r._`a|
|00000b20| 06 7c 30 5f 03 27 31 2e | 20 20 d4 48 45 20 c9 c6 |.|0_.'1.|  .HE ..|
|00000b30| 20 53 54 52 55 43 54 55 | 52 45 20 54 45 53 54 53 | STRUCTU|RE TESTS|
|00000b40| 20 54 4f 20 53 45 45 20 | 57 48 49 43 48 65 60 61 | TO SEE |WHICHe`a|
|00000b50| 06 86 2d 5f 03 24 4f 46 | 20 54 57 4f 20 41 4c 54 |..-_.$OF| TWO ALT|
|00000b60| 45 52 4e 41 54 49 56 45 | 20 41 43 54 49 4f 4e 53 |ERNATIVE| ACTIONS|
|00000b70| 20 53 48 4f 55 4c 44 20 | 42 45 65 60 61 06 90 12 | SHOULD |BEe`a...|
|00000b80| 5f 03 09 45 58 45 43 55 | 54 45 44 2e 65 60 61 06 |_..EXECU|TED.e`a.|
|00000b90| 9a 2f 5f 03 26 11 32 2e | 20 20 d4 48 45 20 c9 c6 |./_.&.2.|  .HE ..|
|00000ba0| 20 53 54 52 55 43 54 55 | 52 45 20 43 41 4e 20 42 | STRUCTU|RE CAN B|
|00000bb0| 45 20 43 4f 4d 42 49 4e | 45 44 20 65 60 61 06 a4 |E COMBIN|ED e`a..|
|00000bc0| 2d 5f 03 24 57 49 54 48 | 20 4f 54 48 45 52 20 53 |-_.$WITH| OTHER S|
|00000bd0| 54 52 55 43 54 55 52 45 | 53 20 54 4f 20 47 49 56 |TRUCTURE|S TO GIV|
|00000be0| 45 20 41 20 52 49 43 48 | 65 60 61 06 ae 2e 5f 03 |E A RICH|e`a..._.|
|00000bf0| 25 56 41 52 49 45 54 59 | 20 4f 46 20 50 52 4f 47 |%VARIETY| OF PROG|
|00000c00| 52 41 4d 4d 49 4e 47 20 | 50 4f 53 53 49 42 49 4c |RAMMING |POSSIBIL|
|00000c10| 49 54 49 45 53 2e 65 60 | 61 06 b8 30 5f 03 27 11 |ITIES.e`|a..0_.'.|
|00000c20| 33 2e 20 20 c3 4f 4d 4d | 45 4e 54 20 4d 41 52 4b |3.  .OMM|ENT MARK|
|00000c30| 53 20 28 2f 2f 29 20 53 | 48 4f 55 4c 44 20 53 45 |S (//) S|HOULD SE|
|00000c40| 50 41 52 41 54 45 65 60 | 61 06 c2 30 5f 03 27 50 |PARATEe`|a..0_.'P|
|00000c50| 52 4f 43 45 44 55 52 45 | 53 20 54 4f 20 4d 41 4b |ROCEDURE|S TO MAK|
|00000c60| 45 20 54 48 45 4d 20 45 | 41 53 49 45 52 20 54 4f |E THEM E|ASIER TO|
|00000c70| 20 52 45 41 44 2e 65 60 | 61 06 cc 30 5f 03 27 11 | READ.e`|a..0_.'.|
|00000c80| 34 2e 20 20 d2 41 4e 44 | 4f 4d 20 4e 55 4d 42 45 |4.  .AND|OM NUMBE|
|00000c90| 52 53 20 43 41 4e 20 42 | 45 20 47 45 4e 45 52 41 |RS CAN B|E GENERA|
|00000ca0| 54 45 44 20 42 59 65 60 | 61 06 d6 22 5f 03 19 41 |TED BYe`|a.."_..A|
|00000cb0| 20 53 54 41 4e 44 41 52 | 44 20 46 55 4e 43 54 49 | STANDAR|D FUNCTI|
|00000cc0| 4f 4e 2c 20 d2 ce c4 2e | 65 60 61 06 e0 06 7f 10 |ON, ....|e`a.....|
|00000cd0| 81 06 ea 0a ff 1e 02 00 | 07 ff 1f 06 f4 24 5f 03 |........|.....$_.|
|00000ce0| 1b d4 48 49 53 20 43 4f | 4e 43 4c 55 44 45 53 20 |..HIS CO|NCLUDES |
|00000cf0| 4c 45 53 53 4f 4e 20 4e | 49 4e 45 2e 65 60 61 06 |LESSON N|INE.e`a.|
|00000d00| fe 05 7d 1f 07 08 04 00 | 07 12 09 70 46 9e 96 00 |..}.....|...pF...|
|00000d10| 7b 07 1c 06 5f 60 61 07 | 26 04 95 07 30 22 b5 03 |{..._`a.|&...0"..|
|00000d20| 17 9e 45 4e 54 45 52 20 | 4c 49 53 54 20 43 4f 4d |..ENTER |LIST COM|
|00000d30| 4d 41 4e 44 20 2d 2d 3e | b7 09 0c ba bb 07 3a 10 |MAND -->|......:.|
|00000d40| da 06 0c 03 04 4c 49 53 | 54 2d 96 62 96 07 44 06 |.....LIS|T-.b..D.|
|00000d50| 5f 60 61 07 4e 05 7d 46 | 07 58 04 00 07 62 09 70 |_`a.N.}F|.X...b.p|
|00000d60| 47 f0 96 00 7b 07 6c 06 | 5f 60 61 07 76 04 95 07 |G...{.l.|_`a.v...|
|00000d70| 80 21 b5 03 16 9e 45 4e | 54 45 52 20 52 55 4e 20 |.!....EN|TER RUN |
|00000d80| 43 4f 4d 4d 41 4e 44 20 | 2d 2d 3e b7 09 0c ba bb |COMMAND |-->.....|
|00000d90| 07 8a 0f da 06 0c 03 03 | 52 55 4e 2d 96 b6 96 07 |........|RUN-....|
|00000da0| 94 06 5f 60 61 07 9e 05 | 7d 47 07 a8 04 00 07 b2 |.._`a...|}G......|
|00000db0| 09 70 48 e3 97 00 7b 07 | bc 0a ff 1e 02 00 0e ff |.pH...{.|........|
|00000dc0| 1f 07 c6 1d 5f 03 14 45 | 41 52 54 48 27 49 53 27 |...._..E|ARTH'IS'|
|00000dd0| 52 4f 55 4e 44 3a 3d 54 | 52 55 45 65 60 61 07 d0 |ROUND:=T|RUEe`a..|
|00000de0| 2b 5f 03 22 50 52 49 4e | 54 20 22 43 4f 4c 55 4d |+_."PRIN|T "COLUM|
|00000df0| 42 55 53 20 49 53 20 41 | 42 4f 55 54 20 54 4f 20 |BUS IS A|BOUT TO |
|00000e00| 53 41 49 4c 2e 22 65 60 | 61 07 da 1f 5f 03 16 49 |SAIL."e`|a..._..I|
|00000e10| 46 20 45 41 52 54 48 27 | 49 53 27 52 4f 55 4e 44 |F EARTH'|IS'ROUND|
|00000e20| 20 54 48 45 4e 65 60 61 | 07 e4 2b 5f 03 22 20 50 | THENe`a|..+_." P|
|00000e30| 52 49 4e 54 20 22 48 45 | 20 57 49 4c 4c 20 44 49 |RINT "HE| WILL DI|
|00000e40| 53 43 4f 56 45 52 20 41 | 4d 45 52 49 43 41 2e 22 |SCOVER A|MERICA."|
|00000e50| 65 60 61 07 ee 0d 5f 03 | 04 45 4c 53 45 65 60 61 |e`a..._.|.ELSEe`a|
|00000e60| 07 f8 2a 5f 03 21 20 50 | 52 49 4e 54 20 22 48 45 |..*_.! P|RINT "HE|
|00000e70| 27 4c 4c 20 53 41 49 4c | 20 4f 46 46 20 54 48 45 |'LL SAIL| OFF THE|
|00000e80| 20 45 44 47 45 2e 22 65 | 60 61 08 02 0e 5f 03 05 | EDGE."e|`a..._..|
|00000e90| 45 4e 44 49 46 65 60 61 | 08 0c 05 7d 48 08 16 04 |ENDIFe`a|...}H...|
|00000ea0| 00 08 20 09 70 49 75 99 | 00 7b 08 2a 0a ff 1e 02 |.. .pIu.|.{.*....|
|00000eb0| 00 0e ff 1f 08 34 13 5f | 03 0a 50 52 4f 43 20 47 |.....4._|..PROC G|
|00000ec0| 55 45 53 53 65 60 61 08 | 3e 26 5f 03 1d 20 50 52 |UESSe`a.|>&_.. PR|
|00000ed0| 49 4e 54 20 22 49 20 4e | 4f 57 20 48 41 56 45 20 |INT "I N|OW HAVE |
|00000ee0| 41 20 4e 55 4d 42 45 52 | 2e 22 65 60 61 08 48 10 |A NUMBER|."e`a.H.|
|00000ef0| 5f 03 07 20 52 45 50 45 | 41 54 65 60 61 08 52 2a |_.. REPE|ATe`a.R*|
|00000f00| 5f 03 21 20 20 49 4e 50 | 55 54 20 22 45 4e 54 45 |_.!  INP|UT "ENTE|
|00000f10| 52 20 59 4f 55 52 20 47 | 55 45 53 53 3a 22 3a 47 |R YOUR G|UESS:":G|
|00000f20| 55 45 53 53 65 60 61 08 | 5c 21 5f 03 18 20 20 49 |UESSe`a.|\!_..  I|
|00000f30| 46 20 47 55 45 53 53 20 | 3c 20 4e 55 4d 42 45 52 |F GUESS |< NUMBER|
|00000f40| 20 54 48 45 4e 65 60 61 | 08 66 29 5f 03 20 20 20 | THENe`a|.f)_.   |
|00000f50| 20 50 52 49 4e 54 20 22 | 54 4f 4f 20 4c 4f 57 2e | PRINT "|TOO LOW.|
|00000f60| 20 20 47 55 45 53 53 20 | 41 47 41 49 4e 22 65 60 |  GUESS |AGAIN"e`|
|00000f70| 61 08 70 10 5f 03 07 20 | 20 45 4e 44 49 46 65 60 |a.p._.. | ENDIFe`|
|00000f80| 61 08 7a 21 5f 03 18 20 | 20 49 46 20 47 55 45 53 |a.z!_.. | IF GUES|
|00000f90| 53 20 3e 20 4e 55 4d 42 | 45 52 20 54 48 45 4e 65 |S > NUMB|ER THENe|
|00000fa0| 60 61 08 84 2a 5f 03 21 | 20 20 20 50 52 49 4e 54 |`a..*_.!|   PRINT|
|00000fb0| 20 22 54 4f 4f 20 48 49 | 47 48 2e 20 20 47 55 45 | "TOO HI|GH.  GUE|
|00000fc0| 53 53 20 41 47 41 49 4e | 22 65 60 61 08 8e 10 5f |SS AGAIN|"e`a..._|
|00000fd0| 03 07 20 20 45 4e 44 49 | 46 65 60 61 08 98 1c 5f |..  ENDI|Fe`a..._|
|00000fe0| 03 13 20 55 4e 54 49 4c | 20 47 55 45 53 53 3d 4e |.. UNTIL| GUESS=N|
|00000ff0| 55 4d 42 45 52 65 60 61 | 08 a2 22 5f 03 19 20 50 |UMBERe`a|.."_.. P|
|00001000| 52 49 4e 54 20 22 59 4f | 55 20 47 55 45 53 53 45 |RINT "YO|U GUESSE|
|00001010| 44 20 49 54 21 21 22 65 | 60 61 08 ac 10 5f 03 07 |D IT!!"e|`a..._..|
|00001020| 45 4e 44 50 52 4f 43 65 | 60 61 08 b6 05 7d 49 08 |ENDPROCe|`a...}I.|
|00001030| c0 04 00 08 ca 09 70 4a | 99 99 00 7b 08 d4 12 82 |......pJ|...{....|
|00001040| 05 10 00 02 00 01 84 02 | 03 e7 85 88 f4 89 08 de |........|........|
|00001050| 05 7d 4a 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.}J.....|........|
|00001060| 00 00 00 00 00 00 00 10 | ee af 00 00 00 00 00 00 |........|........|
|00001070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001080| 00 00 00 00 00 00 00 00 | 00 00 12 f3 af 00 00 10 |........|........|
|00001090| e9 af 00 00 00 00 00 00 | 00 00 00 00 00 00 14 76 |........|.......v|
|000010a0| 8a 00 00 14 d7 89 00 00 | 14 20 8b 00 00 14 59 8a |........|. ....Y.|
|000010b0| 00 00 00 00 00 00 00 14 | 59 8c 00 00 14 d9 8d 00 |........|Y.......|
|000010c0| 00 14 bd 8f 00 00 14 ae | 91 00 00 14 1d 92 00 00 |........|........|
|000010d0| 14 02 8b 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010e0| 00 00 00 00 00 00 00 00 | 00 14 37 94 00 00 00 00 |........|..7.....|
|000010f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 14 53 96 00 |........|.....S..|
|000011b0| 00 14 a7 96 00 00 14 f9 | 96 00 00 14 ec 97 00 00 |........|........|
|000011c0| 14 7e 99 00 00 03 43 4c | 53 04 4c 49 4e 45 08 42 |.~....CL|S.LINE.B|
|000011d0| 4f 52 44 45 52 43 4f 04 | 57 41 49 54 05 44 45 4c |ORDERCO.|WAIT.DEL|
|000011e0| 41 59 0b 53 43 52 45 45 | 4e 43 4f 4c 4f 52 0c 42 |AY.SCREE|NCOLOR.B|
|000011f0| 41 43 4b 47 52 4f 55 4e | 44 43 4f 06 43 48 41 4e |ACKGROUN|DCO.CHAN|
|00001200| 47 45 08 43 4f 4e 54 49 | 4e 55 45 04 47 45 54 41 |GE.CONTI|NUE.GETA|
|00001210| 03 47 45 54 01 41 0a 53 | 48 49 46 54 27 46 4c 41 |.GET.A.S|HIFT'FLA|
|00001220| 47 06 46 4f 52 4d 41 54 | 05 45 52 52 4f 52 0a 53 |G.FORMAT|.ERROR.S|
|00001230| 48 49 46 54 27 57 41 49 | 54 05 49 4e 54 52 4f 07 |HIFT'WAI|T.INTRO.|
|00001240| 50 41 47 45 4f 4e 45 04 | 50 41 47 45 03 54 57 4f |PAGEONE.|PAGE.TWO|
|00001250| 07 50 41 47 45 54 57 4f | 09 50 41 47 45 54 48 52 |.PAGETWO|.PAGETHR|
|00001260| 45 45 08 50 41 47 45 46 | 4f 55 52 08 50 41 47 45 |EE.PAGEF|OUR.PAGE|
|00001270| 46 49 56 45 07 50 41 47 | 45 53 49 58 04 4d 45 4e |FIVE.PAG|ESIX.MEN|
|00001280| 55 03 4c 49 54 04 43 48 | 41 52 02 44 45 02 41 54 |U.LIT.CH|AR.DE.AT|
|00001290| 07 53 55 4d 4d 41 52 59 | 06 43 48 4f 49 43 45 06 |.SUMMARY|.CHOICE.|
|000012a0| 53 45 43 4f 4e 44 02 49 | 53 03 54 48 45 05 46 49 |SECOND.I|S.THE.FI|
|000012b0| 52 53 54 05 54 48 49 52 | 44 03 4f 41 44 05 4c 4c |RST.THIR|D.OAD.LL|
|000012c0| 49 53 54 06 52 45 4e 55 | 4e 4d 05 52 45 4e 55 4e |IST.RENU|NM.RENUN|
|000012d0| 08 44 49 53 54 41 4e 43 | 45 07 4d 49 4c 45 41 47 |.DISTANC|E.MILEAG|
|000012e0| 45 08 47 41 4c 27 43 4f | 53 54 09 54 52 49 50 27 |E.GAL'CO|ST.TRIP'|
|000012f0| 43 4f 53 54 05 43 4f 55 | 4e 54 03 41 47 45 06 41 |COST.COU|NT.AGE.A|
|00001300| 4e 53 57 45 52 05 41 4e | 53 57 45 01 4c 03 41 55 |NSWER.AN|SWE.L.AU|
|00001310| 54 02 41 34 0a 50 45 4e | 43 4f 4c 4f 52 31 32 03 |T.A4.PEN|COLOR12.|
|00001320| 53 55 4d 06 4e 55 4d 42 | 45 52 06 49 4e 50 55 54 |SUM.NUMB|ER.INPUT|
|00001330| 41 06 57 48 49 4c 54 45 | 02 52 55 04 50 52 4e 54 |A.WHILTE|.RU.PRNT|
|00001340| 05 53 43 4f 52 45 05 54 | 4f 54 41 4c 07 41 56 45 |.SCORE.T|OTAL.AVE|
|00001350| 52 41 47 45 06 44 45 4c | 36 39 30 06 53 59 4e 54 |RAGE.DEL|690.SYNT|
|00001360| 41 58 04 45 44 54 49 05 | 47 55 45 53 53 0a 47 45 |AX.EDTI.|GUESS.GE|
|00001370| 54 27 52 41 4e 44 4f 4d | 0b 46 49 4e 44 27 52 41 |T'RANDOM|.FIND'RA|
|00001380| 4e 44 4f 4d 04 50 52 4f | 54 08 47 45 54 27 4c 49 |NDOM.PRO|T.GET'LI|
|00001390| 53 54 07 47 45 54 27 52 | 55 4e 0c 49 46 27 45 58 |ST.GET'R|UN.IF'EX|
|000013a0| 41 4d 50 4c 45 27 31 0c | 49 46 27 45 58 41 4d 50 |AMPLE'1.|IF'EXAMP|
|000013b0| 4c 45 27 32 05 50 41 55 | 53 45 00 00             |LE'2.PAU|SE..    |
+--------+-------------------------+-------------------------+--------+--------+